## UserStartup•Goodies## Initializes the goodies package and sets up menus## IMPORTANT NOTE:## You MUST edit this file to match your configuration BEFORE# installing this package.## MPW Goodies Package# Copyright Apple Computer, Inc. 1988. All Rights Reserved.# Macintosh Developer Technical Support.# May be distributed freely but not sold.############################################################################################## This section needs to be modified to work############################################################################################# Set this to be the folder where you keep the Goodies files.# By default, this is defined to be inside of the MPW# folder. CHANGE IT IF YOU DIDN'T PUT THE GOODIES FOLDER INSIDE# THE {MPW} FOLDER. Set Goodies "{MPW}Goodies:" Export Goodies# Projector stuff Set UserInitials "PUT YOUR INITIALS HERE" Set Writers "PUT NAMES OF ALL SOFTWARE AUTHORS HERE" If "{User}" == "" Set User "PUT YOUR FULL NAME HERE" End Export UserInitials Export Writers Export User# Set to the folder containing your source code Set SourceDir "PUT SOURCE FOLDER HERE, OR SET TO {MPW}" Export SourceDir# MacApp 2.0's MABuild allows a large set of flags. We have defined some# handy flag handlers in the MyBuildMenu script. These variables control the# initial settings of these variables Set MADebuggingFlag 1 # compile with MacApp debugging turned on Set MASADEFlag 0 # compile with SADE symbols Set MARunFlag 1 # run application after build Set MAAutoBuildFlag 0 # autobuild MacApp library# We set this to be the directory where an older version of MPW lives# (e.g., MPW 2.0.2, MPW 3.0b1, etc). I use MPW 3.0 and a newer,# experimental version, so my old MPW is actually MPW 3.0. You# will probably want to set this to something else. Set OldMPWPath "PUT PATHNAME FOR OLD MPW FOLDER HERE, OR LEAVE IT BLANK" Export OldMPWPath# We set default font and fontsize variables here, since we use them in# a command below. You can set these to whatever you prefer, but be sure# they are set to something. You can comment these lines out if you set# these variables up in your UserStartup file. Set Font Courier Set FontSize 10############################################################################################# You probably won't need to modify anything below here.############################################################################################# Set variable for list of directories containing projects Set ProjDirList "{Goodies}ProjectFolders" Export ProjDirList# list of invisible characters: edit with Show Invisibles on Set InvisibleSet '
⁄€‹›fifl‡·‚„‰ÂÊÁËÈÍÎÏÌÓÔÒÚÛÙıˆ˜¯˘˙˚¸˝˛ˇ'# look in Goodies for commands and scripts Set Commands "{Goodies},{Commands}" Export Commands# set up path for old MPW first... Set OldCommands "{OldMPWPath}Tools:,{OldMPWPath}Scripts:,{Commands}" Export OldCommands# Set up our project hierarchy Execute InitProjector# Setup Edit Menu AddMenu Edit '(-' '' # Justify a selected block of text with default margins (of 0 and 60). AddMenu Edit 'Justify/Δ' ∂ 'Justify "{Active}".§ > "{MPW}"MPW.Justify; ∂ Catenate "{MPW}"MPW.Justify > "{Active}".§; ∂ Delete "{MPW}"MPW.Justify' # Justify a selected block of text with a hanging indent AddMenu Edit 'Hanging Indent/˙' ∂ 'Justify -l `Request -d "0,4" What indent do you want.` "{Active}".§ > "{MPW}"MPW.Justify; ∂ Catenate "{MPW}"MPW.Justify > "{Active}".§; ∂ Delete "{MPW}"MPW.Justify' # Justify a selected block of text adding a ∂ to each line # Useful for contining lines in makefiles or shell scripts AddMenu Edit "Continued/∂∂" ∂ 'Justify -e "∂∂" -l `Request -d "0,4" What indent do you want.` "{Active}".§ > "{MPW}"MPW.Justify; ∂ Catenate "{MPW}"MPW.Justify > "{Active}".§; ∂ Delete "{MPW}"MPW.Justify' AddMenu Edit '(-' '' Set TemporaryFile "{SystemFolder}MPW—Scratch" Delete -i "{TemporaryFile}" AddMenu Edit 'Default Font/1' 'Format -f "{Font}" -s "{FontSize}" "{Active}"'# modify the find menu AddMenu Find (- '' AddMenu Find 'Find Invisible/ƒ' 'Find /[{InvisibleSet}]/ "{Active}"'# create the lookup menu Execute LookupMenu# create the project menu Execute ProjectMenu# Create the build menu Execute MyBuildMenu# Create the CommandKey menu Execute KeyMenu
